From: Kim F. Storm <storm@cua.dk>
Date: Mon, 29 Mar 2004 11:45:11 +0000 (+0000)
Subject: (Fcall_interactively): Fix last change.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~23435
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=d34b0964138ef92bb9ee9b8cd5e376e37fe1eb79;p=emacs.git

(Fcall_interactively): Fix last change.
From David Ponce  <david@dponce.com>
---

diff --git a/src/callint.c b/src/callint.c
index a7933bb14d5..1d7d6f9f89f 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -351,7 +351,7 @@ supply if the command inquires which events were used to invoke it.  */)
     {
       Lisp_Object form;
       GCPRO2 (function, prefix_arg);
-      Finteractive_form (function);
+      form = Finteractive_form (function);
       UNGCPRO;
       if (CONSP (form))
 	specs = filter_specs = Fcar (XCDR (form));